home *** CD-ROM | disk | FTP | other *** search
/ Compute! Gazette 1986 July / 1986-07.d64 / hi-res dump.note (.txt) < prev    next >
Commodore BASIC  |  2022-09-20  |  642b  |  19 lines
  1. 10 print"[147]"chr$(34)"hi-res dump"chr$(34)" is not intended to be a"
  2. 20 print"stand-alone program. it should be"
  3. 30 print"appended to a program which will create
  4. 40 [153]"a hi-resclosescreen."
  5. 50 [153]"    since the gazette disk is write"
  6. 60 [153]"close   protected, you may wish to copy
  7. 70 print" [160] [160]"chr$(34)"hi-res dump"chr$(34)" to a different":print"    disk."
  8. 80 print"    press any key to load the menu"
  9. 90 ve=peek(772)+256*peek(773):ifve=17165thenck=1
  10. 100 gosub170
  11. 110 ifckthen160
  12. 120 poke53280,14:poke53281,14:print"[147][154]load";chr$(34);"nt";chr$(34);",8"
  13. 130 a$=chr$(13)+"run"+chr$(13)
  14. 140 fori=1tolen(a$):poke630+i,asc(mid$(a$,i)):next:poke198,i-1
  15. 150 new
  16. 160 sys65341
  17. 170 ifckthenpoke208,0:wait208,1:getmt$:return
  18. 180 poke198,0:wait198,1:getmt$:return
  19.